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Ruby 中 的 元 编程 


本 系列 翻译 自 Ruby Metaprogramming 站 点 上 的 课程 笔记 ， 并 加 入 了 我 (DeathKing) 的 一 些 个 人 演 
资料 补充 等 。 希 望 对 大 家 有 所 帮助 。 


凉 


该 课程 由 Satoshi Asakawa 讲 授 ， 使 用 ruby 1.9.1p243 [i386-mingw32]。 而 我 的 测试 环境 则 是 ruby 
1.9.2p180 [i386-mingw32]。 


本 系列 教程 在 2011 年 9 月 间 翻 译 完毕 ， 最 初 发布 在 我 的 博客 上 。 于 2014 年 5 月 间 ， 藉 由 GitBook 整 理 ， 
并 发 布 在 GitHub 上 。 在 此 期 间 ，Paolo Perrotta 所 著 的 《Ruby 元 编程 》 也 被 翻译 并 出 版 。 同 时 ，Ruby 版 本 
也 从 1.9 飞 跃 到 了 2.1， 尽 管 如 此 ， 本 系列 介绍 的 Ruby 元 编程 技术 仍然 可 用 ， 读 者 可 以 放心 阅读 。 


翻译 的 动机 


Ruby 是 动态 的 、 魔 幻 而 有 趣 的 。 而 元 编程 (Metaprogramming) 技术 在 Ruby 中 的 应 用 也 让 我 大 开眼 
界 ， 虽 然 以 前 也 有 浅显 地 介绍 反射 机 制 (Reflection) ， 但 我 仍然 觉得 才 朴 学 浅 ， 不 能 让 大 家 完全 感受 到 元 
编程 的 优美 。 借 此 机 会 ， 我 想 借 Satoshi Asakawa 的 本 系列 讲座 ， 为 大 家 展示 一 个 绚丽 的 Ruby 元 编程 世 
界 ; 


元 编程 的 定义 看 似 是 明 确 的 ， 但 却 又 模棱两可 。 维 基 百 科 上 对 元 编程 的 定义 如 下 : 


元 编程 是 指 某 类 计算 机 程序 的 编写 ， 这 类 计算 机 程序 编写 或 者 操纵 其 它 程序 (或 者 自身 ) 作为 它 


们 的 数据 ， 或 者 在 运行 时 完成 部 分 本 应 在 编译 时 完成 的 工作 。 多 数 情况 下 ， 与 手工 编写 全 部 代码 相 
比 ， 程 序 员 可 以 获得 更 高 的 工作 效率 , 或 者 给 与 程序 更 大 的 灵活 度 去 处 理 新 的 情形 而 无 需 重 新 编译 。 


而 我 也 在 网 上 找到 了 Free Mind 对 元 编程 的 简介 : 


回 到 元 编程 ， 程 序 处 理 程 序 可 以 分 为 “处 理 其 他 程序 "和 "处理 自己 ”对 于 前 者 ， 有 我 们 熟悉 的 lex 


和 yacc 作 为 例子 。 而 对 于 后 者 ， 如 果 再 细 分 ， 可 以 分 为 “ 宏 扩 展 "“ 源 代码 生成 "以 及 “运行 时 动态 修 
改 " 等 几 种 。 


宏 扩 展 从 最 简单 的 C 语 言 的 宏 到 复 末 的 Lisp 的 宏 系统 ， 甚 至 C++ 的 “模板 元 编程 "也 可 以 包含 在 这 一 


类 里 面 ， 我 在 这 里 对 它们 进行 了 一 些 介绍 。 


源 代 码 生成 则 主要 是 利用 编程 语 让 的 eval 功 能 ， 对 生成 出 来 的 源 代 码 〈 除 了 在 Lisp 这 样 的 语言 里 


面 以 外 ， 通 常 是 以 字符 串 的 方式 ) 进行 求 值 。 有 一 类 有 趣 的 程序 quine， 它 们 和 运行 的 结果 就 是 把 自己 
的 源 代 码 原封 不 动 地 打印 出 来 ， 通 常 要 证 明 你 精通 某 一 门 语言 ， 为 它 写 一 个 quine 是 绝 佳 的 选择 了 ， 
这 里 有 我 搜集 的 一 些 相关 资料 。 


最 后 是 运行 时 修改 ， 像 Lisp、Python 以 及 Ruby 之 类 的 语言 允许 在 运行 时 直接 修改 程序 自身 的 结 


构 ， 而 不 用 再 经 过 “生成 源 代码 "这 一 层 。 当 然 对 源 代码 进行 eval 的 方法 也 许 是 最 灵活 的 ， 但 是 它 的 效 
率 却 不 怎么 样 ， 所 以 相 来 说 并 不 是 特别 流行 。 这 里 主要 介绍 的 是 这 种 方式 的 元 编程 在 Ruby 里 面 的 应 
用 ， 如 果 对 元 编程 的 其 他 方面 感 兴 趣 ， 前 面 的 几 个 链接 应 该 都 是 很 好 的 去 处。 


而 元 编程 技术 ， 最 早 来 自 于 Lisp。John M. Vlissides 在 Pattern Languages of Program Design 一 书 中 


写 到 : 


程 ”(metaprogramming) 


Lisp 社 团 位 于 现在 称 之 为 "反射 编程 ”(reflective programming) 或 “元 编 
对 可 编程 语言 编程 的 前 治 。Smalltalk 事 实 上 从 20 世 纪 70 年 代 后 期 就 开 





始 支持 元 类 。 但 它 是 Lisp 专 用 语言 ， 从 Comman 和 ObjVlisp 开 始 ， 推 动 元 编程 成 为 主流 
[Bobrow+86，Cointe87]。 早 期 工作 为 主 对 象 协议 (Metaobject Protocal) [Kiczales+91] 打 下 了 基 
础 。 主 对 象 协议 主要 用 来 推广 元 编程 。 商 业 系统 也 开始 使 用 元 编程 ， 特 别 是 在 IBM SOM 平 台 上 。 


而 你 或 许 不 知道 Meta ( 源 于 希腊 语 ) 这 个 前 级 在 这 里 的 意思 是 抽象 。 


Ruby 中 的 元 编程 


Ruby 中 的 元 编程 ， 是 可 以 在 运行 时 动态 地 操作 语言 结构 (如 类 、 模 块 、 实 例 变量 等 ) 的 技术 。 你 甚至 


于 可 以 在 不 用 重启 的 情况 下 ， 在 运行 时 直接 键入 一段 新 的 Ruby 代 码 ， 并 执行 它 。 


Ruby 的 元 编程 ， 也 具有 "利用 代码 来 编写 代码 "的 作用 。 例 如 ， 常 见 的 attr_accessor 等 方法 就 是 如 此 。 


一 点 技术 上 的 细节 


Lisp 通 过 既 可 以 用 于 代码 也 可 以 用 于 数据 的 S 表 达 式 《本 质 上 是 程序 抽象 语法 树 的 直接 翻译 ) 支 


持 语法 层 的 元 编程 。Lisp 的 元 编程 大 量 的 使 用 了 宏 ， 宏 的 本 质 是 代码 模板 。Lisp 的 这 种 方式 带 来 的 好 
处 是 可 以 在 单一 的 层次 上 进行 编程 ， 代 码 及 数据 都 以 相同 的 方式 表现 ， 唯 一 的 区 别 在 于 是 否 会 被 估 值 
(evaluate) 。 然 而 语法 层 的 元 编程 模式 也 有 其 弊端 ， 用 在 同一 命名 空间 下 运行 和 估 值 的 代码 对 两 个 
抽象 层次 进行 操作 ， 会 直接 导致 变量 捕获 (Variable Capture) 和 不 经 意 的 多 次 估 值 这 类 问题 的 出 
现 。 纵 使 有 标准 的 Lisp 惯 用 法 可 以 处 理 这 些 问题 ，Lisp 程 序 员 仍 然 是 需要 学 习 和 考虑 更 多 的 东西 。 


Ruby 可 以 通过 ParseTree 库 来 完成 语法 层 的 自省 ，ParseTree 可 以 将 Ruby 源 代码 翻译 成 S 表 达 
式 。 使 用 此 库 来 编写 的 一 个 有 趣 的 应 用 叫做 Heckle， 它 是 一 个 “测试 的 测试 "框架 ， 能 够 对 Ruby 代 码 解 
析 及 改变 ， 例 如 改变 字符 串 或 者 将 'true' 和 'false' 进 行 来 回 的 调换 。 其 想法 是 如 果 测 试 履 盖 率 很 好 ， 那 
么 对 代码 任何 部 分 的 任何 变更 都 应 该 导致 单元 测试 的 失败 。 


与 语法 自省 相对 应 的 一 种 更 高 层次 的 自省 叫做 语义 自省 ， 既 通过 语言 更 高 层次 的 数据 结构 对 程序 
进行 探查 。 在 不 同 的 编程 语言 中 语义 自省 的 方式 十 分 不 同 ， 在 Ruby 语 言 中 一 般 来 说 都 是 作用 于 类 及 方 
法 层 上 : 创建 方法 ， 重 写 方 法 ， 给 方法 赋予 别名 (alias) ; 截取 方法 调用 ; 操纵 继承 链 。 这 些 技术 和 
语法 层 自省 相 比 与 已 有 的 代码 更 为 正 交 (相关 度 更 小 ) ， 因 为 它们 倾向 于 将 已 存在 的 方法 视 为 黑 盒 而 
不 是 修改 其 内 部 实现 。 


一 摘自 里 克 的 自习 室 
更 多 的 参考 资料 


1. Ruby's Metaprogramming toolbox:http://weare.buildingsky.net/2009/08/25/rubys- 
metaprogramming-toolbox 

2. Metaprogramming in Ruby:http://yehudakatz.com/2009/11/15/metaprogramming-in-ruby-its-all- 
about-the-self/ 

3. Practical Metaprogramming with Ruby: Storing 
Preferences:http://www.kalzumeus.com/2009/11/17/practical-metaprogramming-with-ruby-storing- 
preferences/ 

4. The Ruby Object Model and Metaprogramming:http://pragprog.com/screencasts/v-dtrubyom/the- 
ruby-object-model-and-metaprogramming 

5. Metaprogramming Ruby: class_eval and 
instance_eval:http://jimmycuadra.com/posts/metaprogramming-ruby-class-eval-and-instance-eval 

6. Metaprogramming in Ruby:http://rubyrogues.com/metaprogramming-in-ruby/ 


实例 变量 、 方 法 、 类 


对 象 的 实例 变量 及 方法 


实例 变量 (Instance Variables) 是 当 你 使 用 它们 时 ， 才 会 被 建立 的 对 象 。 因 此 ， 即 使 是 同一 个 类 的 
实例 ， 也 可 以 有 不 同 的 实例 变量 。 


从 技术 层面 上 来 看 ， 一 个 对 象 (实例 ) 只 是 存储 了 它 的 实例 变量 和 其 所 属 类 的 引用 。 因 此 ， 一 个 对 象 
的 实例 变量 信 存 在 于 对 象 中 ， 方 法 (我们 称 之 为 实例 方法 (Instance Methods) ) 则 存在 于 对 象 所 属 的 类 
中 。 这 也 就 是 为 什么 同一 个 类 的 实例 都 共享 类 中 的 方法 ， 却 不 能 共享 实例 变量 的 原因 了 。 


米 
六 


。 类 也 是 对 象 。 

。 因为 类 也 是 一 个 对 象 ， 能 应 用 于 对 象 的 此 可 运用 于 类 。 类 和 任何 对 象 一 样 ， 有 它们 自己 的 类 ， Class 类 
即 是 class 类 的 实例 。 

。 与 其 它 的 对 象 一 样 ， 类 也 有 方法 。 对象 的 方法 即 是 其 所 属 类 的 实例 方法 。 亦 即 ， 任 何 一 个 类 的 方法 就 
是 class 类 的 实例 方法 。 

。 所 有 的 类 有 共同 的 祖先 Object 类 (都 是 从 Object 类 直接 或 间接 继承 而 来 ) ， 而 Object 类 又 继承 
自 BasicObject 类 ，Ruby 类 的 根本 。 


[= == 


。 类 名 是 常量 (Constant) 。 


下 面 的 代码 有 助 于 你 理解 这 些 信息 : 








# 对 象 的 方法 即 为 其 所 属 类 的 实例 方法 
1.methods == 1.class.instance methods 
#=> true 


# 类 的 “济源 ” 

N = Class.new 

N.ancestors 

#=> [N, Object, Kernel, BasicObject] 
N.class 

#=>> Class 

N.superclass 

#=> Object 
N.superclass.superclass 

#=> BasicObject 
N.superclass.superclass.superclass 
#=> nil 


类 是 开放 的 


在 Ruby 中 ， 类 始终 都 是 开放 的 。 你 可 以 重 定义 一 个 类 ， 甚 至 于 像 String 或 Array 这 样 的 标准 库 中 的 
类 。 (译注 : Ruby 2.0 引 入 了 refine 来 限定 这 种 打开 类 的 作用 域 。) 


class String 
def writesize 
self.size 
end 
end 


puts "Tell me my size!".writesize 


MA 


壮 意 ! 


当 你 打开 一 个 类 的 时 候 ， 一 定 要 万 分 小 心 ! 如 果 你 随意 向 类 中 添加 方法 或 数据 ， 你 可 能 会 收 到 许 
多 的 BUG， 比 如 ， 你 定义 了 自己 的 captalize() 方法 并 且 漫 不 经 心 的 履 盖 了 原 String 类 中 
的 captalize() 方法 ， 你 很 可 能 会 收 到 风险 。 


多 重 initialize 方 法 


下 面 将 示范 一 个 类 的 重 坊 (Overloading) 。 我 们 编写 了 一 个 Rectangule 类 ， 该 类 用 于 将 一 个 矩形 呈 
现在 网 格 上 。 当 你 在 实例 化 一 个 Rectangule 对 象 时 ， 你 可 以 使 用 两 种 方法 : 传递 矩形 的 左上 、 右 下 的 坐 
标 ， 或 者 左上 点 坐标 及 矩形 的 宽度 、 高 度 。 虽然 Ruby 中 每 个 类 只 有 一 个 initialize 方法 ， 但 这 种 做 法 允许 你 
的 一 个 initialize 就 像 两 个 不 同 的 initialize 一 样 。 


# The Rectangle constructor accepts arguments in either 
# of the following forms: 
# Rectangle.new([x top, y_left], length, width) 
# Rectangle.new([x top, y _left], [x _bottom, y_right]) 
class Rectangle 
def initialize(*args) 
if args.size < 2 || args.size > 3 
puts 'Sorry. This method takes either 2 or 3 arguments.' 
else 
puts 'Correct number of arguments.' 
end 
end 
end 
Rectangle.new([10, 23], 4, 10) 
Rectangle.new([10, 23], [14, 13]) 


上 述 代码 还 不 足以 编写 一 个 完整 的 Rectangule 程序 ， 但 却 足以 演示 方法 重 载 是 如 何 实现 的 。 
对 initialize 方法 的 重 载 可 使 得 其 具有 义理 可 变 参 数 的 能 力 。 这 种 技巧 不 但 适用 于 initialize 方法 ， 也 适用 于 
其 他 方法 ! 


匿名 类 


一 个 匿名 类 (Anonymous Class) 也 被 称 作 单 例 类 (Singleton Class) ， 特 征 类 
(Eigenclass) ， 和 鬼魂 类 (Ghost Class) ， 元 类 (Metaclass) 或 者 uniclass。 


关于 eigenclass 这 个 名 字 的 由 来 : 大 多 数 人 叫 它 singlton classes， 另 一 部 分 人 叫 它 
metaclasses， 意 思 是 the class of a class。 但 是 这 些 名 字 都 不 足以 描述 它 。Ruby 之 父 Matz 至 今 还 没 
有 给 出 一 个 官方 的 名 字 ， 但 是 他 似乎 喜欢 叫 它 eigenclass，eigen 这 个 词 来 自 于 德语 ， 意 思 是 one's 
own。 所 以 ，eigenclass 就 被 翻译 为 "an object's own class"”。 而 eigenclass 的 方法 名 字 ， 则 取 了 一 个 
比较 科学 严肃 的 名 字 叫 Singlton Methods。 参考 自 blackanger 对 Metaprogramming Ruby 的 笔记 





(5)](http://book.douban.com/people/blackanger/annotation/4086938/)) 


“特征 类 "是 一 个 很 好 的 命名 。 这 个 “特征 "和 线性 代数 中 “特征 值 ` “特征 向 量 " 的 “特征 ”是 一 个 意 
思 。 "特征 值 ` “特征 向 量 "的 名 称 是 由 德国 数学 家 David Hilbert (大 卫 : 希 尔 伯 特 ) 在 1904 年 使 用 并 
得 以 流传 的 ， 德 语 单词 “Eigen" 本 意 为 “自己 的 "。Eigenclass， 也 就 意味 着 “自己 的 类 "”， 用 于 Ruby 
的 “ 单 例 类 "概念 之 上 十 分 贴切 ， 因 为 “ 单 例 类 "实际 上 就 是 一 个 对 象 独 有 的 类 。 参考 自 紫 苏 的 特征 
类 = 





Ruby 中 每 个 对 象 都 有 其 自己 的 匿名 类 ， 一 个 类 能 拥有 方法 ， 但 是 只 能 对 该 对 象 本 身 其 作用 : 当 我 们 对 
一 个 具体 的 对 象 添加 方法 时 ，Ruby 会 插入 一 个 新 的 匿名 类 于 父 类 之 间 ， 来 容纳 这 个 新 建立 的 方法 。 值 得 注 
意 的 是 ， 匿 名 类 通常 是 不 可 见 (Hidden) 的 。 它 没有 名 字 因 此 不 能 像 其 他 类 一 样 ， 通 过 一 个 常量 来 访问 。 
你 不 能 为 这 个 匿名 类 实例 化 一 个 新 的 对 象 。 


下 面 展示 了 建立 匿名 类 的 一 些 方法 : 


#1 
class Rubyist 
def self.who 
"Geek" 
end 
end 


#2 
class Rubyist 
class << self 
def who 
"Geek" 
end 
end 
end 


#3 

class Rubyist 

end 

def Rubyist.who 
"Geek" 

end 


#4 
class Rubyist 
end 
Rubyist.instance eval do 

def who 

"Geek" 

end 
end 
puts Rubyist.who # => Geek 


#5 
class << Rubyist 
def who 
"Geek" 
end 
end 


上 述 5 段 代码 ， 分 别 定义 了 Rubylist.who 方法 ， 该 方法 返回 "Geek" 。 


任何 时 候 ， 一 旦 你 看 到 如 上 述 标号 为 #5 的 代码 ， class 关键 字 后 面 紧 接着 << ， 你 就 应 该 确信 这 里 
为 << 右边 的 对 象 打开 了 一 个 匿名 类 。 


你 可 以 参看 Complete Ruby Class Diagram 一 文 ， 文 中 展示 了 Ruby 1.8.6 中 的 用 户 定义 类 及 他 们 的 超 
类 的 关系 。 而 下 面 这 幅 由 Artem S 贡 献 的 Ruby 层 次 关系 (Ruby 2.0.0) 也 非常 有 用 : 


Ruby 2.0 Core Object Model 
Modules 
Classes 
一 SUperclass (inheritance) 
一 -Includes module 
一 一 Class 


| Kernel 卫 


Comparable - 
Enumerable 1: 


Math 


Marshal | [ Objectspace 
GC:Profiler 


File::Constants 


Process-UID 
Process:Sys] [ Process:GID 


IO:WaitReadable 
IO:WaitWritable 


BasicObject 
































TrueClass FalseClass Exception 
C JE 1 (人 _Exepto _) 
C fatal ) ( SystemExt ) ( NoMemoyEror ) 


StandardError ScriptError SignalException 
Method Proc PE 2 = 


(Binding  ) ( UnboundMethod ) 
























二 Regexp ) ( MatchData ) 
























( Mmay )( Hash ) 


Enumerator 


Enumerator:Lazy 























NotmplementedEror )|( Interupt  ) 


(CF RuntimeError ) (IndexEror 


LocalJumpError 
(RegexpError ) 


(SecurtyError ) 


SystemStackError 


(ThreadEror ) (Math:DomainEror) 




































( Fiber Wu Mutex ) 















(Thead  ) ( ThreadGroup ) 


























(Encodng  ) (Encoding:Converter) 



































NameError 


EOFError 


NoMethodError 


(Rubw ) (RubwwEn ) 


((RubyM:InstructionSequence ) ( Data ) 

































RangeError FloatDomainError 














(ThreadEror ) ( ArgumentError ) 
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(CProcess:Status ) (Thread:Backrace ) 




















(Complex:compatible ) (Continuation ) (TypeEror ) ( FiberEror 
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方法 的 调用 
当 你 在 调用 某 一 个 方法 的 时 候 ，Ruby 会 完成 下 面 的 步骤 : 


。 找到 这 个 方法 ， 我 们 把 这 个 过 程 称 作 方法 查找 (method lookup) 
。 执行 这 个 方法 ， 为 了 执行 这 个 方法 ，Ruby 需 要 一 个 叫做 self 的 伪 变 量 ; 


方法 的 查找 


要 理解 Ruby 的 方法 查找 ， 你 需要 了 解 下 面 两 个 概念 : 接受 者 (receiver) 和 祖先 链 (ancestors 
chain) 。 接 受 者 就 是 方法 的 调用 者 。 例 如 ， 对 调用 an_object.display() 来 说 ， an_object 就 是 接受 者 。 而 
关于 宜 先 链 ， 请 考察 任何 一 个 Ruby 类 的 内 部 。 想 象 一 下 从 一 个 类 移动 到 其 父 类 ， 然 后 再 移动 到 父 类 的 父 
类 ， 直 到 到 达 Object 类 (默认 的 父 类 ) ， 然 后 继续 移动 ， 最 终 到 达 BasicObject 类 (Ruby 层 级 模型 中 的 
根 ) 。 你 通 历 这 些 类 所 走 过 的 路 径 就 是 祖先 链 (祖先 链 中 也 包括 模块 ) 。 


因此 ， 为 了 查找 方法 ，Ruby 首 先进 入 receiver 所 属 的 类 ， 并 以 此 为 起 始 ， 治 着 祖先 链 不 断 前 进 ， 直 到 
找到 目标 方法 。 这 种 行为 也 被 称 作 “向 右 一 步 ， 再 向 上 Ci step to the right, then up) ”规则 : 向 右 一 
步 ， 进 入 reciver 所 属 的 类 ， 然 后 再 向 上 查找 祖先 链 ， 直 到 找到 目标 方法 。 ( 译 者 注 : 如 果 通 万 完 宜 先 链 也 
没有 找到 方法 的 话 ， 会 调用 method_missing 方法 ， 如 果 这 个 方法 没有 被 定义 ， 则 抛 出 NoMethodError ) 当 
你 在 一 个 类 中 包含 一 个 模块 时 ，Ruby 创 建 了 一 个 匿名 类 来 封装 这 个 模块 ， 并 将 这 个 匿名 类 插入 到 祖先 链 
中 ， 也 在 这 个 类 的 上 方 。 


下 面 的 代码 演示 了 一 次 方法 查找 : 


class A 
def foo 
end 
end 
class B<A 
def bar 
# bar method in B 
end 
end 
Glass 一 
def bar 
# bar method in C 
# overwriting superclass' method 
end 
end 


obj = C.new 

obj.bar #=> in C class 

obj.foo #=> not in C class 
#=> then go to Cs superclass B 
#=> not in B class 
#=> then go to B's superclass A 
#=>> execute it 


self 


。 在 Ruby 中 ， self 是 一 个 很 特殊 的 变量 ， 它 总 是 指向 当前 对 象 (current object) ; 
。 self 被 认为 是 默认 的 receiver。 也 就 是 说 ， 你 如 果 没 有 明确 指出 receiver， 那 么 系统 将 把 self 当做 


receiver ; 

。 实例 变量 是 在 self (当前 对 象 )》 中 查找 的 。 也 就 是 说 ， 如 果 我 使 用 @var ， 那 么 Ruby 就 会 在 self 所 指 
向 的 对 象 中 去 寻找 此 实例 变量 。 需 要 注意 的 是 ， 实 例 变量 并 不 是 由 类 定义 的 ， 它 们 也 和 子 类 以 及 继承 
机 制 无 关 。 


因此 ， 当 我 们 在 调用 一 个 明确 指出 receiver 的 方法 时 ，Ruby 会 按照 下 面 的 步骤 执行 : 
obj.do_ method(param) 
。 将 self 指向 obj ; 


。 在 self 所 属 的 类 中 查找 do_method(param) 方法 (方法 是 存放 在 类 中 ， 而 不 是 实例 中 ! ) 
。 调用 方法 do_ method(param) ; 


实用 元 编程 方法 


本 章节 将 介绍 一 系列 的 元 编程 实用 方法 ， 使 读者 对 元 编程 有 一 个 更 为 具体 的 认识 。 其 中 一 些 技术 ， 诸 
如 反射 机 制 ， 已 经 有 很 多 文章 介绍 过 了 ， 读 者 可 以 根据 自身 的 情况 进行 选择 是 否 跳 过 。 


内 省 、 反 射 


一 说 编写 元 程序 的 语言 称 之 为 元 语言 。 被 操纵 的 程序 的 语言 称 之 为 目标 语言 。 一 门 编程 语言 同时 
也 是 自身 的 元 语言 的 能 力 称 之 为 反射 或 者 自 反 。 


一 一 摘自 维基 百科 元 编程 条 目 


在 Ruby 中 ， 你 完全 有 能 力 在 运行 时 查看 类 或 对 象 的 信息 。 我 们 可 以 使 用 class 、 instance_methods、 
intance_variables 等 方法 来 达到 目的 。 我 们 将 这 种 技术 称 为 内 省 (Introspection) 或 者 反射 
(Reflection) 。 请 考虑 下 面 的 代码 : 


class Rubyist 
def what _ does he do 
@person = 'A Rubyist' 
'Ruby programming' 
end 
end 


an_object = Rubyist.new 

puts an_object.class # => Rubyist 

puts an_object.class.instance methods(false) # => what does he do 
an_object.what does he do 

puts an_object.instance variables # => @person 


respond_to? 方法 是 反射 机 制 中 另 一 个 有 用 的 方法 。 使 用 respond _to? 方法 ， 可 以 提前 知道 对 象 是 否 能 
够 处 理 你 想 要 交 予 它 执 行 的 信息 。 所 有 的 对 象 都 有 此 方法 ， 使 用 respond _to? 方法 ， 你 可 以 确定 对 象 是 否 能 
使 用 指定 的 方法 。 


obj = Object.new 
if obj.respond to?(:program) 
obj.program 
else 
puts "Sorry, the object doesn't understand the 'program' message." 
end 


send 


send 是 Object 类 的 实例 方法 。 send 方法 的 第 一 个 参数 是 你 期 望 对 象 执 行 的 方法 的 名 称 。 可 以 是 一 
个 字符 串 (String) 或 者 符号 (Symbol) ， 但 是 我 们 更 喜欢 使 用 符号 。 剩 余 的 参数 就 直接 传递 给 所 指定 的 
方法 。 


class Rubyist 
def welcome(*args) 
"Welcome " + args.join(' ) 
end 
end 


obj = Rubyist.new 
puts(obj.send(:welcome, "famous", "Rubyists")) # => Welcome famous Rubyists 


使 用 send 方法 ， 你 所 想 要 调用 的 方法 就 顺理成章 的 变 成 了 一 个 普通 的 参数 。 你 可 以 在 运行 时 ， 直 至 最 
后 一 刻 自 由 决定 到 底 调用 哪个 方法 。 


class Rubyist 
end 


rubyist = Rubyist.new 
if rubyist.respond to?(:also_railist) 
puts rubyist.send(:also railist) 
else 
puts "No such information available" 
end 


上 述 代 码 展 示 了 如 果 rubyist 对 象 知道 如 何 处 理 also_railist 方法 ， 那 么 他 将 会 进行 处 理 。 


你 可 以 通过 send 方法 调用 任何 方法 ， 即 使 是 私有 方法 。 


class Rubyist 
private 
def say_hello(name,) 
"#{name} rocks!!" 
end 
end 


obj = Rubyist.new 
puts obj.send(:say_hello, 'Matz') 


define method 


Module#define_method 是 Module 类 实例 的 私有 方法 。 因 此 define_method 方 法 仅 能 由 类 或 者 模块 使 
用 。 你 可 以 通过 define_method 动 态 的 在 receiver 中 定义 实例 方法 。 而 你 仅 需 要 传递 需要 定义 的 方法 的 名 
字 ， 以 及 一 个 代码 块 (block) ， 就 如 下 面 演示 的 那样 : 


class Rubyist 
define_ method :hello do |my _arg| 
my_arg 
end 
end 


obj = Rubyist.new 
puts(obj.hello('Matz')) # => Matz 


method missing 


当 Ruby 使 用 look-up 机 制 找 寻 方 法 时 ， 如 果 方 法 不 存在 ， 那 么 Ruby 将 会 在 原 receiver 中 自行 调用 一 个 叫 
做 method_missing 的 方法 。 method_missing 方法 会 以 符号 的 形式 传递 被 调用 的 那个 不 存在 的 方法 的 名 
字 ， 以 数组 的 形式 传递 调用 时 的 参数 ， 以 及 原 调用 中 传递 的 块 。 method_missing 是 由 Kernel 模块 提供 的 
方法 ， 因 此 任意 对 象 都 有 此 方法 。 Kernel#method_missing 方法 能 响应 NoMethodError 错误 。 重 
载 method_missing 方法 允许 你 对 不 存在 的 方法 进行 处 理 。 


class Rubyist 
def method_missing(m, *args, &block) 
puts "Called #{m} with #{args.inspect} and #{block}" 
end 
end 


Rubyist.new.anything # => Called anything with [] and 
Rubyist.new.anything(3, 4) { something } # => Called anything with [3, 4] and #<Proc:0x02efd664@tr 
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关于 method_missing ，ihower 给 出 了 一 个 漂亮 的 例子 : 


car = Car.new 
car.go to taipei 

# go to taipel 
car.go to shanghai 
# go to shanghai 
car.go to japan 

# go to japan 


class Car 
def go(place) 
puts "go to #{place}" 
end 


def method_missing(name, *args) 
if name.to s =~ /人 go to (.*)/ 
go($1) 
else 
super 
end 
end 
end 


这 个 例子 出 自 于 他 在 Ruby Conf China 2010 上 的 讲义 《如 何 设计 出 漂亮 的 Ruby API》 中 ， 你 能 够 在 他 
的 个 人 博客 中 看 到 相关 介绍 ， 不 过 这 个 例子 只 出 现在 讲义 的 幻灯 片 中 。 


3 
注 忌 


method_missing 方法 的 效率 不 甚 理想 ， 对 效率 敏感 的 项 目 尽量 要 避免 使 用 此 方法 。 尽 
管 method_missing 的 确 很 强力 。 


remove _method 和 undef_ method 


想 要 移 除 已 存在 的 方法 ， 你 可 以 在 一 个 打开 的 类 的 作用 域 (Scope) 内 使 用 remove_method 方法 。 即 


使 是 父 类 以 及 父 类 的 父 类 等 先祖 中 有 同名 的 方法 ， 那 些 方法 也 不 会 被 移 除 。 而 相 比 之 
下 ，undef method 会 阻止 任何 对 指定 方法 的 访问 ， 无 论 该 方法 是 在 对 象 所 属 的 类 中 被 定义 ， 还 是 其 父 类 
及 其 先祖 类 。 


class Rubyist 
def method_missing(m, *args, &block) 
puts "Method Missing: Called #{m} with #{args.inspect} and #{block}" 
end 


def hello 
puts "Hello from class Rubyist" 
end 
end 


class IndianRubyist < Rubyist 
def hello 
puts "Hello from class IndianRubyist" 
end 
end 


obj = IndianRubyist.new 
obj.hello # => Hello from class IndianRubyist 


class IndianRubyist 

remove method :hello # removed from IndianRubyist, but still in Rubyist 
end 
obj.hello # => Hello from class Rubyist 


class IndianRubyist 

undef method :hello # prevent any calls to 'hello' 
end 
obj.hello # => Method Missing: Called hello with [] and 


eval 


Kernel 模块 提供 了 一 个 叫做 eval 的 方法 ， 该 方法 用 于 执行 一 个 用 字符 串 表示 的 代码 。 eval 方法 可 以 
计算 多 行 代 码 ， 使 得 将 整个 程序 代码 铭 入 到 字符 串 中 并 执行 成 为 了 可 能 。 eval 方法 很 慢 ， 在 执行 字符 串 前 
es 不 过 ， 糟 糕 的 是 ， eval 方法 会 变 得 十 分 危险 。 如 果 外 部 数据 通过 eval 传递 的 话 ， 你 就 

可 能 会 遭遇 一 个 安全 漏洞 ， 因 为 这 些 数 据 可 能 含有 任意 的 代码 ， 并 且 你 的 程序 将 会 执行 它 。 现 在 ， eval 方 
tt 的 情况 下 才 被 选择 的 。 


str = "Hello" 
puts eval("str + ' Rubyist") # => "Hello Rubyist" 


关于 eval 方法 ， 苏 小 脉 给 出 了 下 面 的 建议 : 


一 般 来 说 ， 能 避免 eval 就 尽量 避免 ， 因 为 eval 有 额外 的 “分 析 时 "开销 (将 字符 串 作 为 源 代 码 进 
行 词法 、 文 法 分 析 ) ， 而 这 个 “剖析 时 " 却 又 是 在 程序 "运行 时 "进行 的 。 把 不 需要 惰性 求 值 的 表达 式 预 
先进 行 及 早 求 值 ， 能 避免 一 些 分 析 时 开销 。 如 果 可 能 的 话 ， 用 instance_exec ， 或 instance eval 带 块 
的 形式 ， 也 比 直接 在 字符 串 上 求 值 好 。 


一 一 苏 小 脉 在 如 果 用 这 种 方式 来 构造 一 些 复杂 的 对 象 呢 ?上 的 发 言 


而 关于 eval 方法 的 安全 性 漏洞 ，Dave Thomas 在 他 的 著作 Programming Ruby (英文 页 面 ) 中 列举 了 


一 个 十 分 有 趣 的 例子 : 


Walter Webcoder 有 一 个 非常 棒 的 想法 : 设计 一 个 Web 算 数 页 面 。 该 页 面 是 含有 一 个 文本 域 以 及 
按钮 的 简单 Web 表 单 ， 并 被 各 种 各 样 的 非常 酷 的 数学 链接 和 横幅 广告 包围 ， 使 得 看 起 来 丰富 多 彩 。 用 
户 输入 一 个 算术 表达 式 到 文本 域 中 ， 并 按 下 按钮 ， 然 后 结果 就 会 被 显示 出 来 。 一 夜 之 间 ， 世 界 上 所 有 
计算 器 都 变 得 无 用 了 ; Walter 大 大 获 利 ， 然 后 他 退休 并 把 他 的 余生 用 于 收集 车 牌号 。 


Walter 认为 实现 这 样 一 个 计算 器 很 容易 。 他 可 以 用 Ruby 的 CGI 库 访问 表单 域 中 的 内 容 ， 再 用 eval 方 
法 把 字符 串 当做 表达 式 来 求 值 。 

require 'cgi' 

cgi= CGl::new("html4") 


# Fetch the value of the form field "expression" 
expr = cgil"expression"].to s 

begin 

result = eval(expr) 

rescue Exception => detail 

# handle bad expressions 

end 


# display result back to user... 


Walter 把 这 个 应 用 程序 放 到 网 上 才 几 秒 钟 ， 来 自 Waxahachie 的 一 个 12 岁 小 孩 在 表单 中 输入 
了 system("rm") ， 随 他 的 计算 机 上 的 文件 一 起 ，Walter 的 美梦 一 下 子 破灭 了 。 


Walter 得 到 了 一 个 重要 的 教训 : 所 有 的 外 部 数据 都 是 有 危险 的 。 不 要 让 它们 靠近 那些 可 能 改动 你 的 系 
统 的 接口 。 在 这 个 案例 中 ， 表 单 中 的 内 容 是 外 部 数据 ， 而 对 eval 的 调用 正 是 一 个 安全 漏洞 。 


一 一 Programming Ruby 中 文 第 二 版 ，Dave Thomas，Chad Fowler，Andy Hunt 著 
instance_eval, module eval, class eval 
instance eval ， module eval 和 class eval 是 eval 方法 的 特殊 形式 。 
instance_eval 


Object 类 提供 了 一 个 名 为 instance_eval 的 公开 方法 ， 该 方法 可 被 一 个 实例 调用 。 他 提供 了 操作 对 象 的 
实例 变量 的 途径 。 可 以 使 用 字符 串 向 此 方法 传递 参数 或 者 传递 一 个 代码 块 。 


class Rubyist 
def initialize 
@geek = "Matz" 
end 
end 
obj = Rubyist.new 








# instance eval 可 以 操纵 obj 的 私有 方法 以 及 实例 变量 





obj.instance eval do 
puts self # => #<Rubyist:0x2ef83d0> 
puts @geek # => Matz 

end 


通过 instance eval 传递 的 代码 块 使 得 你 可 以 在 对 象 内 部 操作 。 你 可 以 在 对 象 内 部 肆意 操纵 ， 不 再 会 有 
任何 数据 是 私有 的 ! instance eval 亦 可 用 于 添加 类 方法 。 


class Rubyist 
end 


Rubyist.instance eval do 
def who 
"Geek" 
end 
end 


puts Rubyist.who # => Geek 


还 记得 我 们 在 之 前 匿名 类 的 讲述 (代码 清单 第 四 条 ) 么 ? 这 个 例子 在 这 里 被 再 一 次 的 使 用 。 


module eval, class eval 


module_eval 和 class_eval 方法 用 于 模块 和 类 ， 而 不 是 对 象 。 class_eval 是 module_eval 的 一 个 别 
名 。 module eval 和 class eval 可 用 于 从 外 部 检索 类 变量 。 


class Rubyist 
@@geek = "Ruby's Matz" 
end 
puts Rubyist.class eval("@@geek") # => Ruby's Matz 


module_eval 和 class_eval 方法 亦 可 用 于 添加 类 或 模块 的 实例 方法 。 尽 管 名 字 上 两 个 方法 时 不 同 的 ， 但 
他 们 的 功能 是 相同 的 ， 并 且 都 可 以 在 模块 或 者 类 上 使 用 。 


class Rubyist 
end 
Rubyist.class_eval do 
def who 
"Geek" 
end 
end 
obj = Rubyist.new 
puts obj.who # => Geek 


各 注 
当 作用 于 类 时 ， class_eval 将 会 定义 实例 方法 ， 而 instance_eval 定义 类 方法 。 
class_Vvariable_get, class variable set 


添加 或 查询 一 个 类 变量 ， class variable get 方法 和 class_variable set 方法 都 可 以 被 使 
用 。 class_variable_get 方法 需要 一 个 代表 变量 名 称 的 符号 作为 参数 ， 并 返回 变量 的 
值 。 class_variable_set 方法 也 需要 一 个 代表 变量 名 称 的 符号 作为 参数 ， 同 时 也 要 求 传递 一 个 值 ， 作 为 欲 设 
定 的 值 。 


class Rubyist 
@@geek = "Ruby's Matz" 
end 


Rubyist.class variable set(:@@geek, 'Matz rocks!') 
puts Rubyist.class variable get(:@@geek) # => Matz rocks! 


class variables 


如 果 你 想 知道 一 个 类 中 有 哪些 类 变量 ， 我 们 可 以 使 用 class_varibles 方 法 。 他 返回 一 个 数组 (Array) ， 
以 符号 (Symbol) 的 形式 返回 类 变量 的 名 称 。 


class Rubyist 
@@geek = "Ruby's Matz" 
@@country = "USA" 

end 


class Child < Rubyist 
@@city = "Nashville" 
end 
print Rubyist.class variables # => [:@@geek, :@@country] 
puts 
p Child.class variables # => [:@@city] 


你 可 以 从 程序 的 输出 中 观察 到 Child.class_variables 输出 的 是 在 Child 类 中 定义 的 类 变量 
(@@city ) 。 Child 类 没有 从 父 类 中 继承 类 变量 ( @@geek，@@country ) 。 


instance_variable_ get, instance variable set 


我 们 可 以 使 用 instance variable_get 方法 查询 实例 变量 的 值 。 


class Rubyist 

def initialize(p1, p2) 

@geek, @country = pl1, p2 

end 
end 
obj = Rubyist.new('Matz', 'USA') 
puts obj.instance variable get(:@geek) # => Matz 
puts obj.instance variable get(:@country) # => USA 


类 比 于 class_variable set ， 你 可 以 使 用 instance variable_set 来 设置 一 个 对 象 的 实例 变量 的 值 。 


class Rubyist 
def initialize(p1, p2) 
@geek, @country = pl1, p2 
end 
end 


obj = Rubyist.new!('Matz', 'USA') 

puts obj.instance variable get(:@geek) # => Matz 

puts obj.instance variable get(:@country) # => USA 
obj.instance variable set(:@country, Japan') 

puts obj.inspect # => #<Rubyist:0x2ef8038 @country="Japan", @geek="Matz"> 


这 样 做 的 好 处 就 是 ， 你 不 需要 使 用 attr_accessor 等 方法 为 访问 实例 变量 建立 接口 。 
const_get, const set 


类 似 的 ， const_get 和 const_set 用 于 操作 常量 。 const_get 返回 指定 常量 的 值 : 
puts Float.const get(:MIN) # => 2.2250738585072e-308 


const_set 为 指定 的 常量 设置 指定 的 值 ， 并 返回 该 对 象 。 如 果 常 量 不 存在 ， 那 么 他 会 创建 该 常量 ， 就 是 
下 面 示范 的 那样 : 


class Rubyist 
end 
puts Rubyist.const_set("PI"，22.0/7.0) # => 3.14285714285714 


因为 const_get 返回 常量 的 值 ， 因 此 ， 你 可 以 使 用 此 方法 获得 一 个 类 的 名 字 并 为 这 个 类 添加 一 个 新 的 实 
例 化 对 象 的 方法 。 这 样 使 得 我 们 有 能 力 在 运行 时 创建 类 并 实例 化 其 实例 。 


# Let us call our new class 'Rubyist 
# (We could have prompted the user for a class name) 
class name = "rubyist".capitalize 
Object.const set(class name, Class.new) 
# Let us create a method 'who' 
# (We could have prompted the user for a method name) 
class name = Object.const get(class name) 
puts class name # => Rubyist 
class_ name.class eval do 

define_ method :who do |my _arg| 

my_arg 

end 
end 
obj = class name.new 
puts obj.who('Matz') # => Matz 


绑 定 


诸如 本 地 变量 、 实 例 变量 、 self 一 类 的 实体 .……. 或 者 说 所 有 于 对 象 绑 定 的 名 称 。 我 们 把 他 们 称 为 绑 定 
(bindings) 。 


下 面 内 容 摘自 柴 苏 的 博客 ， 该 文 对 我 们 的 讨论 很 有 意义 。 


在 计算 机 科学 中 , “ 绑 定 ”(Binding) 一 词 是 指 一 个 更 复杂 、 更 大 型 的 物件 的 引用 的 创建 。 例 如 当 我 
们 编 守 了 一 个 画 数 ， 这 个 画 数 名 就 绑 定 了 该 男 数 本 体 ， 我 们 可 以 通过 函数 名 来 引用 并 调用 该 函数 ， 这 被 称 
为 名 称 绑 定 ; 又 如 当 Ruby 通 过 API 去 调用 了 C 语 言 写 的 库 豆 数 时 ， 这 就 是 一 个 语言 绑 定 ; 再 如 面向 对 象 语言 
中 的 方法 调度 obj.method ， 这 也 是 一 个 名 称 绑 定 ， 它 会 根据 接收 者 obj 具体 的 对 象 类 型 来 确定 应 该 引用 哪 
个 对 象 类 型 的 method 方法 ， 而 如 果 obj 在 编译 时 就 能 确定 ， 那 便 可 称 之 为 静态 绑 定 〈 早 绑 定 ) ， 早 期 的 静 
态 类 型 语言 (如 C) 使 用 的 是 早 绑 定 ; 如 果 obj 在 运行 时 才能 确定 ， 那 便 可 称 为 动态 绑 定 〈 迟 绑 定 ) ， 动 态 
类 型 语言 〈 如 Ruby) 使 用 的 是 迟 绑 定 ， 而 有 些 语言 则 同时 支持 早 绑 定 和 迟 绑 定 ， 如 C++ 的 虚 函 数 使 用 迟 绑 
定 ， 普 通 函 数 则 使 用 早 绑 定 。 


在 Ruby 中 ， Kernel 有 一 个 方法 binding ， 它 返回 一 个 Binding 类 型 的 对 象 。 这 个 Binding 对 象 就 是 我 们 
这 里 说 的 绑 定 ， 它 封装 了 当前 执行 上 下 文中 的 所 有 绑 定 (变量 、 方 法、 语句 块 、 self 的 名 称 绑 定 ) ， 而 这 
些 绑 定 直接 决定 了 面向 对 象 语言 中 的 执行 环境 。 上 比如 ， 当 我 们 调用 p 时 ， 实 际 上 是 进行 了 self 和 p 的 绑 
定 ， 而 p 具体 是 哪个 方法 ， 是 由 self 的 类 型 来 决定 的 ， 如 果 我 们 在 顶层 ， 而 Kernel#p 又 没有 被 重 写 ， 
那 p 就 是 一 个 用 来 显示 对 象 细节 的 方法 。 可 以 说 有 了 一 个 绑 定 的 列表 ， 我 们 就 有 了 一 个 完整 的 面向 对 象 上 
下 文 的 拷贝 ， 就 好 比 上 帝 在 12 分 37 秒 复制 了 一 份 世界 ， 而 这 个 世界 与 原本 世界 的 环境 一 模 一 样 ， 既 有 这 条 
花 ， 又 有 那 株 草 。Ruby 的 Binding 对 象 的 概念 和 Continuation 有 共通 之 处 ， 但 Continuation 主 要 用 于 实际 
堆 、 栈 内 存 的 环境 跳 转 ， 而 Binding 则 比较 高 层 。 


这 个 Binding 对 象 有 什么 用 ? 主要 是 用 于 eval 这 个 函数 。 eval 的 第 一 个 参数 是 需要 eval 的 一 段 脚本 字 
符 串 ， 而 第 二 个 可 选 参数 则 接受 一 个 Binding 对 象 。 当 指定 了 Binding 时 ， eval 会 在 传递 给 它 
的 Binding 所 封装 的 执行 环境 里 执行 脚本 ， 否 则 是 在 调用 者 的 执行 环境 里 执行 。 我 们 可 以 通过 这 个 机 制 来 
进行 一 些 不 同上 下 文 之 间 的 通信 ， 或 者 是 在 一 个 上 下 文 即 将 被 销毁 之 前 保存 该 上 下 文 环 境 以 留 他 用 ， 如 : 


def foo 
bar = 'baz' 
return binding 
end 


eval('p bar', foo) 
这 里 我 们 通过 foo 返回 的 Binding 获取 到 了 局 部 上 下 文 销毁 前 的 局 部 变量 bar 的 值 ， 而 在 不 使 
用 binding 的 情况 下 ， 局 部 变量 bar 在 foo 外 层 是 不 可 见 的 。 


最 后 ，Ruby 有 一 个 预定 义 的 常量 : TOPLEVEL BINDING ， 它 指向 一 个 封装 了 顶层 绑 定 的 对 象 ， 通 过 它 
我 们 可 以 在 其 它 上 下 文中 通过 eval 在 顶层 上 下 文 环 境 中 执行 脚本 。 


块 和 绑 定 


每 一 个 Ruby 块 中 ， 都 包含 了 代码 以 及 对 应 的 绑 定 。 当 你 定义 一 个 块 的 时 人 息 ， 它 会 夺 过 当时 环境 的 绑 
定 ， 而 当 你 执行 一 个 带 块 的 方法 的 时 候 ， 它 又 会 传递 这 个 绑 定 。 


def who 
person = "Matz" 
yield("rocks") 
end 


person = "Matsumoto" 


who do |y| 
puts("#{person}, #{y} the world") # => Matsumoto, rocks the world 
city = "Tokyo" 

end 


puts city 
# => undefined local variable or method 'city' for main:Object (NameError) 


观察 上 述 代 码 ， 块 附近 的 person 变量 在 块 被 定义 之 前 是 一 个 新 的 局 部 变量 ， 而 不 是 who 方法 中 
的 person 变量 。 因 此 ， 块 捕获 了 本 地 绑 定 并 把 它们 结合 在 了 一 起 。 你 可 以 在 块 中 定义 新 的 绑 定 ， 不 过 当 块 
的 生命 周期 结束 后 ， 它 们 也 就 消失 了 。 


DeathKing 注 : 注意 变量 定义 的 作用 域 。 在 块 内 部 定义 的 变量 不 能 用 于 块 外 部 。 而 预先 在 块 外 部 定义 的 
变量 ， 经 过 块 的 操作 后 ， 值 会 发 生 改 变 。 


元 编程 实战 
问题 1 


此 问题 改编 自 Dave Thomas 的 屏 播 Episode 5: Nine Examples of Metaprogramming。 


众所周知 ，RubyLearnin.org 的 Core Ruby 课 程 已 经 开办 8 周 了 。 每 周 我 们 都 有 一 个 满分 10 分 的 测验 。8 
周 结束 后 ， 学 生 可 以 知道 他 的 分 数 百 分 比 。 例 如 ， 有 一 个 学 生 ， 在 过 去 的 8 周 里 ， 他 的 得 分 情况 为 : 5、 
10、10、10、10、10、10、10。 那 么 ， 他 的 得 分 百分比 为 93.75%。 


问题 描述 : 每 一 批 Core Ruby 学 习 班 有 成 百 上 千 的 学 生 。 让 我 们 假设 我 们 有 一 个 可 以 计算 这 个 百分比 
并 返回 对 应 的 值 的 Ruby 方 法 。 


现存 的 类 和 方法 


让 我 们 先 来 看 看 已 存在 的 类 和 方法 ， 并 修改 它 ， 来 解决 上 述 问题 。 


class Result 
def total(*scores) 
percentage calculation(*scores) 
end 


private 


def percentage calculation(*scores) 
puts "Calculation for #{scores.inspect}" 
scores.inject {|sum, n| sum + n } * (100.0/80.0) 
end 
end 


r= Result.new 

puts r.total(5,10,10,10,10,10,10,10) 
putsirtotal(SmLOMLOTO LIONMO TOL) 
putsirtotal(LO LO0 1011010-10-10.10) 
putsmtotal(lor too Lom L000) 


上 述 代 码 中 ， 我 们 定义 了 Result 类 以 及 一 个 total 方法 。 total 方法 用 于 列举 每 个 学 生 的 成 
绩 。 score 代表 了 学 生 在 课程 的 8 次 竞赛 中 获得 的 成 绩 。 私 有 方法 percentage_calculation 用 于 计算 等 分 
率 。 为 了 测试 如 此 ， 我 们 调用 total 方法 四 次 。 前 两 次 和 后 两 次 调用 时 分 别 采 用 相同 的 数组 ， 运 行程 序 ， 我 
们 得 到 下 面 的 输出 : 


Galeulation for [Ss, 0、 10° LO L010 .10.10] 
937s, 

@aleulation ton ls LOulOMTOu TO O10- 10| 
93575 

Galeulatliom tor lO 0 T01010010、10、 10] 
100.0 

Galeulationitor [LO TO LO TOR TO O10 10] 
100.0 


观察 输出 ， 我 们 意识 到 我 们 调用 了 total 方法 四 次 ， 这 也 意味 着 我 们 调用 percentage_calculation 方法 
四 次 。 我 们 将 要 党 试 减少 调用 percentage_ calculation 方法 的 次 数 。 


常规 做 法 


减少 对 percentage _calculation 方法 的 调用 的 一 种 途径 是 用 某 种 方法 存放 之 前 计算 出 的 数据 。 对 此 ， 我 
们 需要 定义 一 个 叫做 MemoResult 的 子 类 ， 该 子 类 拥有 一 个 叫做 @mem 的 Hash 类 实例 变量 。 代 码 如 下 : 


class Result 
def total(*scores) 
percentage calculation(*scores) 
end 


private 


def percentage calculation(*scores) 
puts "Calculation for #{scores.inspect}" 
scores.inject {|sum, n| sum + n } * (100.0/80.0) 
end 
end 


class MemoResult < Result 


def initialize 
@mem = {} 
end 


def total(*scores) 
if @mMem.has_ key?(scores) 
@memlscores] 
else 
@meml[scores] = super 
end 
end 
end 


r= MemoResult.new 

puts r.total(5,10,10,10,10,10,10,10) 
putsirtotal(SaLONLO TO LIONOLONO) 
putsirtotal(LO LO LO LOL0-10-10.10) 
putsmtotal(hon Loo Lo LO 0) 


Hash 类 提供 了 has_key? 方法 用 于 检查 某 个 散 列 是 否 拥 有 指定 的 键 。 在 上 述 程序 中 ， 如 果 has_key? 返 
回 true ， 那 么 我 们 就 直接 使 用 @mem 中 存放 的 值 ， 否 则 我 们 将 调用 percentage_calculation(*scores) 重新 
计算 改 值 并 存放 在 @mem 中 。 输 出 如 下 : 


Calculation ion[lsa LO LO T1010 10,. 10, 10] 
93.75 

93375 

Galeulationeforn [Lo LOM LO T1010. 1010 10l 
100.0 

100.0 


观察 上 述 输出 ， 我 们 不 难得 出 ， 在 第 二 次 、 第 四 次 调用 rtotal 的 时 候 ， 我 们 直接 使 用 的 存储 值 。 


使 用 Class.new 和 define_method 的 做 法 


上 面 使 用 的 MemoResult 类 与 其 父 类 精密 相连 。 为 了 避免 这 样 ， 我 们 使 用 目前 学 过 的 Ruby 元 编程 知识 
动态 创建 这 个 子 类 。 


我 们 需要 编写 一 个 接受 两 个 参数 的 方法 mem_result : 一 个 参数 为 父 类 的 名 字 ， 另 一 个 参数 为 方法 的 名 
字 (而 mem _result 方法 会 返回 定义 好 的 类 的 名 字 ) 。 下 面 是 代码 : 


class Result 
def total(*scores) 
percentage calculation(*scores) 
end 


private 


def percentage calculation(*scores) 
puts "Calculation for #{scores.inspect}" 
scores.inject {|sum, n| sum + n } * (100.0/80.0) 
end 
end 


def mem _result(klass, method ) 
mem = {} 
Class.new(klass) do 
define_ method(method) do |*args| 
if mem.has_ key?(args) 
mem[args] 
else 
mem[args] = super 
end 
end 
end 
end 


r= Mem result(Result, :total).new 
putsirtotal(S, 10.10.10,10.10.10.10) 
plutsirtotal(Sa LO LOTLO LOMO TO LO 
putsirtotal(LO LO TOLOL10 L010.10) 
puts r.total(10,10,10,10,10,10,10,10) 


输出 如 下 : 


Caleulationiion [ls OOaOsl0O OO 
95ws 

93m5 

Caleulationisfonl LO LO 10 10° 10- 10-10, 10l 
L000 

100.0 


代码 Class.new(klass) 以 给 定 的 klass 为 父 类 ， 创 建 了 一 个 匿名 类 。 块 被 用 作 类 的 体 ， 包 含 了 该 类 中 的 
方法 。 而 define_method 定义 了 method 所 代表 的 方法 (也 就 是 mem_result 的 第 二 个 参数 ) 。 
注意 


我 们 并 没有 编写 initialize 方法 和 使 用 实例 变量 @mem 。 相 反 地 ， 我 们 使 用 的 是 局 部 变量 mem ， 这 
是 因为 块 是 一 个 闭 包 ， 而 局 部 变量 mem 在 块 内 部 是 有 效 的 。 


使 用 匿名 类 的 做 法 


class Result 
def total(*scores) 
percentage calculation(*scores) 
end 


private 


def percentage calculation(*scores) 
puts "Calculation for #{scores.inspect}" 
scores.inject {|sum, n| sum + n } * (100.0/80.0) 
end 
end 


r= Result.new 


# Anonymous class on object 
def r.total(*scores) 


@mem ||= {} 
f@mem.has _ key?(scores) 
@memlscores] 
else 
@meml[scores] = super 
end 
end 


puts r.total(5,10,10,10,10,10,10,10) 
PUESirsfotal 全 可 0 可 0 可 0 可 000LO) 
putsirtotal(lO LO LO LoLOLO O00) 
puts r.total(10,10,10,10,10,10,10,10) 


使 用 即时 创建 匿名 类 的 做 法 


class Result 
def total(*scores) 
percentage calculation(*scores) 
end 


private 


def percentage calculation(*scores) 
puts "Calculation for #{scores.inspect}" 
scores.inject {|sum, n| sum + n } * (100.0/80.0) 
end 
end 


def mem _result(ob]j, method) 
obj.class.class_eval do 
mem ||= {} 
define_ method(method) do |*args| 
if mem.has_ key?(args) 
mem[args] 
else 
mem[args] = super 
end 
end 
end 
end 


r = Result.new 
mem _result(r, :total) 


puts r.total(5,10,10,10,10,10,10,10) 
putsirtotal(Smr tonLO Lo L100 L000) 
putsrtotal(LO0 LO L000 L010 10.10) 
putsrtotal(LO0 LO LO T00010010) 


上 述 的 代码 中 ， 我 们 编写 了 新 的 mem _result 方法 。 该 方法 的 第 一 个 参数 obj 接收 一 个 对 象 ， 用 于 建立 
此 对 象 的 匿名 类 。 该 方法 的 第 二 个 参数 method 接受 一 个 方法 ， 用 于 指明 要 在 匿名 类 中 创建 的 方法 名 字 。 


在 此 之 前 ， 我 们 已 经 使 用 define_method 即时 地 创建 了 一 个 方法 。 问 题 是 ， define method 只 能 对 类 
或 模块 起 作用 ， 而 我 们 这 里 处 理 的 是 对 象 。 因 此 ， 我 们 使 用 obj.class 来 获得 对 象 所 属 的 类 ， 然 后 对 类 使 
用 class_eval 和 define_method 方法 在 该 类 中 添加 一 个 实例 方法 method 。 现 在 ， 我 们 来 运行 一 下 代码 并 检 
查 输出 。 


result.rb:21:in ‘total': super: no superclass method ‘total' (NoMethodError) 
from result.rb:30 


代码 没有 运 云 行 。 


代码 mem[args] = super 尝试 在 匿名 类 中 调用 Result 类 中 的 total 方法 。 但 问题 是 ， 我 们 是 
在 Result 类 中 直接 定义 的 total 方法 。 我 们 说 过 ， obj.class 返回 的 是 Result ， 所 以 这 并 不 起 效 。 我 们 需 
We 建 一 个 匿名 类 ， 并 将 这 个 total 方法 放 到 这 个 匿名 类 中 。 同 时 ， 我 们 的 匿名 类 应 该 是 Result 类 的 子 


让 我 们 像 下 面 一 样 创建 需要 的 匿名 类 。 


anon = class << obj 
self 
end 


上 述 代 码 中 的 self 返回 了 我 们 需要 的 匿名 类 ， 并 被 变量 anon 所 引用 。 大 多 数 的 Ruby 程 序 员 会 像 下 面 
这 样 把 这 些 代 码 写作 一 行 ， 以 表示 他 们 正 创建 鬼魂 类 。 


anon = class << obj; self; end 
有 了 匿名 类 后 ， 我 们 应 该 对 其 使 用 class eval 方法 ， 就 像 下 面 这 样 : 


Class Result 
def total(*scores) 
percentage calculation(*scores) 
end 


private 


def percentage _ calculation(*scores) 
puts "Calculation for #{scores.inspect}" 
scores.inject {|lsum, n| sum + Nn } * (100.0/80.0) 
end 
end 


def mem _result(ob]j, method) 
anon = class << obj; self; end 
anon.class_eval do 
mem ||= {} 
define_ method(method) do |*args| 
if mem.has_ key?(args) 
mem[args] 
else 
mem[args] = super 
end 
end 
end 
end 


r = Result.new 
mem _result(r, :total) 


putsirtotal(S> LOLO0 .10.10-10°10-.10) 
puts r.total(5,10,10,10,10,10,10,10) 


putsimtotal(LOrLOsLO0LO0MOMLOMONO0) 
puts r.total(10,10,10,10,10,10,10,10) 


代码 正常 运行 ， 并 返回 希望 的 结果 。 
问题 2 


本 例 根据 Hal Fulton 的 文章 [An Exercise in Metaprogramming with 
Ruby(http://an%20exercise%20in%20metaprogramming%20with%20ruby/) 改 编 。 


假设 我 们 有 两 个 CSV (comma-separated values， 数 据 使 用 逗号 分 隔 的 ) 文件 ， 其 头 部 有 一 些 描述 性 


的 文字 ， 如 下 所 示 : 


文件 : location.txt 


name,Ccountry 
"Matz", -SAY 
"Fabio Akita", "Brazil" 
"Peter Cooper", "UK" 


文件 : twitter.txt 


twitterid, url 
"AkitaOnRails","http://www.akitaonrails.com/" 
"peterc","http://www.petercooper.co.uk/" 


首先 ， 我 们 建立 一 个 名 为 datawrapper.rb 的 文件 ， 并 建立 一 个 类 。 我 们 会 调用 DataWrapper 类 并 定义 
一 个 名 为 wrap 的 类 方法 ， 此 方法 请 求 一 个 用 于 标识 文件 名 的 参数 ， 并 据 此 建立 一 个 类 。 上 面 的 两 个 文件 的 
第 一 行 都 是 由 逗号 分 隔 的 属性 名 (attribute names) 。 因 此 ， 我 们 想 要 把 这 些 文件 当做 是 数据 数组 ， 我 们 
将 要 读 取 这 些 数 据 ， 并 以 数组 的 形式 存放 。 


# file: datawrapper.rb 
class DataWrapper 
def self.wrap(file name) 
data = File.new(file name) 
header = data.gets.chomp 
data.close 
puts header # => name,country 
# in the end we return the class name 
end 
end 


接着 ， 我 们 编写 一 个 小 程序 名 为 testdatawrapper.rb。 党 试 着 读 取 location.txt 文 件 。 


#testdatawrapper.rb 
require 'datawrapper' 
DataWrapper.wrap("location.txt") 


回 到 datawrapper.rb 程 序 ， 我 们 需要 新 建 一 个 类 ， 并 给 他 适当 的 名 字 : 


# file: datawrapper.rb 
class DataWrapper 
def self.wrap(file name) 
data = File.new(file name) 
header = data.gets.chomp 
data.close 
class name = File.basename(file name, ".txt").capitalize 
klass = Object.const set(class name, Class.new) 
klass # we return the class name 
end 
end 


变量 klass 指 代 的 是 我 们 新 建 的 类 。 如 果 file_name 参数 所 指向 的 文件 为 "location.txt"， 那 么 新 建立 得 
类 名 会 被 命名 为 Location 。 


再 次 运行 修改 后 的 程序 。 


#testdatawrapper.rb 

require 'datawrapper' 

data = DataWrapper.wrap("location.txt") # Capture return value and 
puts data # => Location 


~ 


然后 就 是 大 展 身手 的 时 候 了 。 文 件 第 一 行 读 入 的 是 表 名 (List Name) 。 我 们 只 需要 使 用 split 方法 即 
读 入 。 修改 后 的 datawrapper.rb 如 下 : 


et 


可 快 


# file: datawrapper.rb 
class DataWrapper 
def self.wrap(file name) 
data = File.new(file name) 
header = data.gets.chomp 
data.close 
class name = File.basename(file name, ".txt").capitalize 
klass = Object.const set(class name, Class.new) 
# get attribute names 
names = header.split(",") 
pnames# => ["name", "country"] 
klass # we return the class name 
end 
end 


现在 ， 在 我 们 新 建立 的 类 的 上 下 文中 使 用 class_eval 。 此 时 ， 我 们 会 定义 一 个 initialize 方法 。 并 且 ， 我 
们 应 该 建立 一 个 to_s 方法 ， 使 得 我 们 能 够 将 其 输出 ， 记 得 使 用 alias 关键 字 将 to_s 方法 作为 inspect 方法 的 
同义词 。 修 改 后 的 datawrapper.rb 程 序 如 下 : 


# file: datawrapper.rb 
class DataWrapper 
def self.wrap(file name) 
data = File.new(file name) 
header = data.gets.chomp 
data.close 
class name = File.basename(file name, ".txt").capitalize 
klass = Object.const set(class name, Class.new) 
# get attribute names 
names = header.split(",") 
klass.class eval do 
attr_accessor *names 
define_method(:initialize) do |*values| 
names.each_with_index do Iname, i| 
instance _ variable set("@"+name, values[i]) 
end 
end 
define_ method(:to s) do 
str = "<#{self.class}:" 
names.each {|lnamel| str <<" #{name}=#{self.send(name)}" } 
SU > 
end 
alias_ method :inspect, :to_s 
end 
klass # we return the class name 
end 
end 


下 一 步 ， 建 立 一 个 类 方法 ， 用 于 读 取 整 个 文本 ， 并 返回 一 个 代表 文本 中 内 容 的 素 组 对 象 。 类 方法 的 建 
立 涉及 到 了 单 体 类 等 概念 ， 但 此 处 不 需要 仔细 考察 。 修 改 后 的 代码 如 下 : 


# file: datawrapper.rb 
class DataWrapper 
def self.wrap(file name) 
data = File.new(file name) 
header = data.gets.chomp 
data.close 
class name = File.basename(file name, ".txt").capitalize 
klass = Object.const set(class name, Class.new) 
# get attribute names 
names = header.split(",") 
klass.class eval do 
attr_accessor *names 
define_method(:initialize) do |*values| 
names.each_with_index do Iname, i| 
instance variable set("@"+name, values[i]) 
end 
end 
define_ method(:to s) do 
str = "<#{self.class}:" 
names.each {|namel| str <<" #{name}=#1{self.send(name)}" } 
SUPE > 
end 
alias_ method :inspect, :to_s 
end 
def klass.read 
array = [] 
data = File.new(self.to_s.downcase+".txt") 
data.gets # throw away header 
data.each do lline| 
line.chomp! 
values = eval("[#{line}]") 
array << self.new(*values) 
end 
data.close 
array 
end 
klass # we return the class name 
end 
end 


修改 testdatawrapper.rb 并 测试 。 


#testdatawrapper.rb 
require 'datawrapper' 
klass = DataWrapper.wrap("location.txt") 
list = klass.read 
list.each do |location| 
puts("#{location.name} is from the #{location.country}") 
end 


让 我 们 来 看 看 和 location.txt 文 件 完 全 不 同 的 twitter.txt 文 件 。 针 对 于 twitter.txt 的 测试 文件 如 下 : 


#testdatawrapper.rb 
require 'datawrapper' 
klass = DataWrapper.wrap("twitter.txt") 
list = klass.read 
list.each do |twitter| 
puts("#{twitter.twitterid }'s site is #{twitter.url}") 
end 


即使 我 们 使 用 了 不 同 的 数据 ，datawrapper.rb 的 代码 也 无 需 改 变 |! 这 便 是 一 个 Ruby 之 中 的 元 编程 的 例 
子 与 实践 。 


Ruby 元 编程 应 用 远 不 止 如 此 ，Rails 里 就 大 量 涉 及 了 这 种 技术 。 你 可 以 仔细 研读 Rails 的 代码 。 


。 An Exercise in Metaprogramming with Ruby. 

。 Metaprogramming Ruby - Author: Paolo Perrotta. 

。 Metaprogramming in Ruby: Its All About the Self. 

。 Programming Ruby 1.9 - Author: Dave Thomas. 

。 Seeing Metaclasses Clearly. 

。 The Book Of Ruby - Author: Huw Collingbourne. 

。 The Ruby Object Model and Metaprogramming screencasts with Dave Thomas. 
。 Understanding Ruby Singleton Classes. 


其 他 参考 


。 倾 国 剑 气 

。 ihower 

。 Free Mind 

。 里 克 的 自习 室 


